home *** CD-ROM | disk | FTP | other *** search
/ Eros - Digital Erotica & Games / Eros - Digital Erotica & Games.iso / mac / EROS vol.1 / EROS vol.DXR / 00418.ls < prev    next >
Encoding:
Text File  |  1995-07-07  |  1.5 KB  |  47 lines
  1. on exitFrame
  2.   global r
  3.   go(marker(0) + 5)
  4.   if r < 2 then
  5.     set r to r + 1
  6.     if r = 2 then
  7.       set the locH of sprite 4 to the locH of sprite 28
  8.       set the locV of sprite 4 to the locV of sprite 28
  9.       set the locH of sprite 5 to the locH of sprite 30
  10.       set the locV of sprite 5 to the locV of sprite 30
  11.       set the locH of sprite 6 to the locH of sprite 27
  12.       set the locV of sprite 6 to the locV of sprite 27
  13.       set the locH of sprite 7 to the locH of sprite 29
  14.       set the locV of sprite 7 to the locV of sprite 29
  15.       puppetSprite(18, 1)
  16.       cursor(0)
  17.     end if
  18.   end if
  19.   movWatch()
  20.   Navi()
  21.   if rollOver(27) then
  22.     set the castNum of sprite 18 to the number of cast "st"
  23.     set the locV of sprite 18 to the locV of sprite 14
  24.     set the locH of sprite 18 to the locH of sprite 14
  25.     exit
  26.   end if
  27.   if rollOver(30) then
  28.     set the castNum of sprite 18 to the number of cast "tt"
  29.     set the locV of sprite 18 to the locV of sprite 15
  30.     set the locH of sprite 18 to the locH of sprite 15
  31.     exit
  32.   end if
  33.   if rollOver(28) then
  34.     set the castNum of sprite 18 to the number of cast "vtt"
  35.     set the locV of sprite 18 to the locV of sprite 16
  36.     set the locH of sprite 18 to the locH of sprite 16
  37.     exit
  38.   end if
  39.   if rollOver(29) then
  40.     set the castNum of sprite 18 to the number of cast "bt"
  41.     set the locV of sprite 18 to the locV of sprite 17
  42.     set the locH of sprite 18 to the locH of sprite 17
  43.     exit
  44.   end if
  45.   set the locV of sprite 18 to -200
  46. end
  47.